home *** CD-ROM | disk | FTP | other *** search
/ SOHO - Exploring the Sun - 2003 Update / SOHO - Exploring the Sun - 2003 Update.iso / pc / data / main.dcr / scripts_57.ls < prev    next >
Encoding:
Text File  |  2003-02-25  |  763 b   |  33 lines
  1. on prepareFrame
  2.   global roll_channel, to_be_roll_frame, to_be_sprite, inst, instold, nappi_sprite, roll_sprite_now
  3.   set roll_sprite_now to 1
  4.   set the puppet of sprite nappi_sprite to 0
  5.   remove_nappi()
  6.   ClrCursorS()
  7.   set instold to EMPTY
  8.   set inst to " "
  9.   set the directToStage of member "sml_sun" to 0
  10.   MYPreload(label("soho_instruments"), label("soho_instruments") + 3)
  11.   set roll_channel to 15
  12.   set roller to 0
  13.   KasiCursor(2)
  14.   KasiCursor(3)
  15.   KasiCursor(4)
  16.   KasiCursor(5)
  17.   KasiCursor(6)
  18.   KasiCursor(7)
  19.   KasiCursor(8)
  20.   KasiCursor(9)
  21.   KasiCursor(10)
  22.   KasiCursor(11)
  23.   KasiCursor(12)
  24.   KasiCursor(13)
  25.   KasiCursor(14)
  26.   HideInstruments()
  27.   set the visible of sprite 14 to 0
  28. end
  29.  
  30. on exitFrame
  31.   set the directToStage of member "sml_sun" to 1
  32. end
  33.